home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 211
- Top = 106
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'WebSpeed 1.5'
- ClientHeight = 195
- ClientWidth = 522
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- OnActivate = FormActivate
- OnClose = FormClose
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 261
- Height = 195
- Align = alLeft
- BevelInner = bvRaised
- BevelOuter = bvLowered
- BevelWidth = 2
- ParentShowHint = False
- PopupMenu = PopupMenu1
- ShowHint = True
- TabOrder = 0
- object Label1: TLabel
- Left = 12
- Top = 57
- Width = 53
- Height = 13
- Alignment = taRightJustify
- Caption = 'MaxMTU ='
- end
- object Label2: TLabel
- Left = 10
- Top = 86
- Width = 55
- Height = 13
- Alignment = taRightJustify
- Caption = 'RWIN ='
- end
- object Label3: TLabel
- Left = 8
- Top = 12
- Width = 245
- Height = 13
- Caption = 'Set the MaxMTU and the multiplier you wish to use. '
- end
- object Label4: TLabel
- Left = 31
- Top = 30
- Width = 199
- Height = 13
- Caption = 'MSS and RWIN will be calculated for you.'
- end
- object Label5: TLabel
- Left = 15
- Top = 115
- Width = 50
- Height = 13
- Alignment = taRightJustify
- Caption = 'Multiplier ='
- end
- object Label6: TLabel
- Left = 148
- Top = 86
- Width = 32
- Height = 13
- Alignment = taRightJustify
- Caption = 'MSS ='
- end
- object MultLabel: TLabel
- Left = 72
- Top = 115
- Width = 31
- Height = 13
- AutoSize = False
- Color = clBtnFace
- ParentColor = False
- end
- object MSS_ValueBox: TLabel
- Left = 190
- Top = 86
- Width = 49
- Height = 13
- AutoSize = False
- Color = clBtnFace
- ParentColor = False
- end
- object RWIN_ValueBox: TLabel
- Left = 72
- Top = 86
- Width = 51
- Height = 13
- AutoSize = False
- Color = clBtnFace
- ParentColor = False
- end
- object Label7: TLabel
- Left = 123
- Top = 135
- Width = 115
- Height = 13
- Caption = 'Drag Bar to set Multiplier'
- end
- object MaxMTUtext: TLabel
- Left = 72
- Top = 57
- Width = 44
- Height = 13
- AutoSize = False
- end
- object Label8: TLabel
- Left = 9
- Top = 155
- Width = 242
- Height = 13
- Alignment = taCenter
- Caption = 'For an explanation of these settings, please see the'
- end
- object Label9: TLabel
- Left = 15
- Top = 170
- Width = 231
- Height = 13
- Alignment = taCenter
- Caption = 'WebSpeed.txt file that accompanies this program'
- end
- object BtnMTU: TButton
- Left = 130
- Top = 50
- Width = 116
- Height = 25
- Caption = '&Change MTU Value'
- Default = True
- TabOrder = 0
- OnClick = BtnMTUClick
- end
- object Slider1: TRxSlider
- Left = 110
- Top = 105
- Width = 140
- Height = 30
- NumThumbStates = 2
- Options = [soShowFocus, soShowPoints]
- Increment = 1
- MinValue = 2
- MaxValue = 10
- Value = 4
- TabOrder = 1
- OnChange = Slider1Change
- UserImages = {00}
- end
- end
- object Panel2: TPanel
- Left = 261
- Top = 0
- Width = 261
- Height = 195
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- BevelWidth = 2
- PopupMenu = PopupMenu1
- TabOrder = 1
- object RadioGroup1: TRadioGroup
- Left = 10
- Top = 10
- Width = 241
- Height = 136
- Caption = 'Which settings will be written to the Registry?'
- TabOrder = 0
- end
- object RadioMTU: TRadioButton
- Left = 15
- Top = 35
- Width = 106
- Height = 17
- Caption = 'Write MTU Only'
- TabOrder = 1
- TabStop = True
- OnClick = RadioRemoveClick
- end
- object RadioRWIN: TRadioButton
- Left = 15
- Top = 55
- Width = 156
- Height = 17
- Caption = 'Write RWIN Only (Unlikely)'
- TabOrder = 2
- TabStop = True
- OnClick = RadioRemoveClick
- end
- object RadioBoth: TRadioButton
- Left = 15
- Top = 75
- Width = 211
- Height = 17
- Caption = 'Write Both MTU and RWIN Settings'
- Checked = True
- TabOrder = 3
- TabStop = True
- OnClick = RadioRemoveClick
- end
- object RadioRemove: TRadioButton
- Left = 15
- Top = 95
- Width = 226
- Height = 17
- Caption = 'Remove WebSpeed changes from Registry'
- TabOrder = 4
- TabStop = True
- OnClick = RadioRemoveClick
- end
- object BtnOptimise: TBitBtn
- Left = 148
- Top = 158
- Width = 101
- Height = 25
- Caption = '&Set Optimum'
- TabOrder = 6
- OnClick = BtnOptimiseClick
- end
- object BtnRegUpdate: TBitBtn
- Left = 13
- Top = 158
- Width = 101
- Height = 25
- Caption = '&Update Registry'
- Enabled = False
- TabOrder = 7
- OnClick = BtnRegUpdateClick
- end
- object RadioAuto: TRadioButton
- Left = 15
- Top = 115
- Width = 206
- Height = 17
- Caption = 'Enable Automatic MTU Detection'
- TabOrder = 5
- TabStop = True
- OnClick = RadioRemoveClick
- end
- end
- object PopupMenu1: TPopupMenu
- Left = 20
- Top = 125
- object ChangeMTU1: TMenuItem
- Caption = 'Change MTU'
- ShortCut = 0
- OnClick = BtnMTUClick
- end
- object Exit1: TMenuItem
- Caption = 'Update Registry'
- ShortCut = 0
- OnClick = BtnRegUpdateClick
- end
- object Optimumvalues1: TMenuItem
- Caption = 'Optimum Values'
- ShortCut = 0
- OnClick = BtnOptimiseClick
- end
- object About: TMenuItem
- Caption = 'About'
- ShortCut = 0
- OnClick = About1Click
- end
- end
- end
-